home *** CD-ROM | disk | FTP | other *** search
/ Oxygen Multimedia Graphics 22 / Oxygen Multimedia Graphics 22.iso / pc / MENU.exe / MENU.dxr / 00007_agree behavior with fileIO.ls < prev    next >
Encoding:
Text File  |  2008-03-06  |  614 b   |  18 lines
  1. global myFile
  2.  
  3. on mouseUp
  4.   if objectp(myFile) then
  5.     myFile = 0
  6.   end if
  7.   myFile = new(xtra("fileio"))
  8.   openfile(myFile, getOSDirectory() & "\oxygen-22.ini", 0)
  9.   delete(myFile)
  10.   createFile(myFile, getOSDirectory() & "\oxygen-22.ini")
  11.   openfile(myFile, getOSDirectory() & "\oxygen-19.ini", 0)
  12.   mySaveString = "You have chosen to agree with the license restrictions for using the product 'OXYGEN Volume 22.' This file exists to act as a 'cookie' so that you will not have to agree every time the product disc is inserted."
  13.   writeString(myFile, mySaveString)
  14.   closeFile(myFile)
  15.   myFile = 0
  16.   go("GO")
  17. end
  18.